

## COMPLETE
variables <- list(
            RiotStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1"                  ),	
		    Synchrony=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                      , "MatrixSolving1"),
          	   German=c("UnscrambleWords1", "BrainstormObject1", "TypingText1"           , "BrainstormWords1"                                    ),
         Technion2016=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                      , "MatrixSolving1"),
              MBA2012=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        ),
            XvalStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1"                  ),
 T1T2CrowdflowerJoint=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
                Kiwon=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        ),
 CMUGenderStatusStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                      , "MatrixSolving1"),
		 Technion2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                      , "MatrixSolving1"),
		 Technion2017=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        ),
              MBA2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1"                  , "MatrixSolving1"),
              MBA2014=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
          	      USC=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        ),	
          	 FortSill=c("UnscrambleWords1", "BrainstormObject1", "TypingText1"                                                                   ),	
T1T2CrowdflowerRound1=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
        T1T2CMUSO2013=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
	             Bots=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        ),
        T1T2CMUSO2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
	     TilburgStudy=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1"                  ),
          Hopkins2015=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1", "BrainstormWords1", "TypingNumbers1", "MatrixSolving1"),
	      Hopkins2016=c("UnscrambleWords1", "BrainstormObject1", "TypingText1", "Sudoku1"                                                        )
)

